home *** CD-ROM | disk | FTP | other *** search
/ Geek Games #12 / GEGA012.iso / Jogos de Azar / 3card_poker.swf / scripts / DefineSprite_166 / frame_2 / DoAction.as
Text File  |  2006-01-17  |  274b  |  17 lines
  1. i = "1";
  2. while(i < "53")
  3. {
  4.    set("dCard" add i,i);
  5.    i += "1";
  6. }
  7. i = "1";
  8. while(i < "53")
  9. {
  10.    a = random("52") + "1";
  11.    swap1 = eval("dCard" add a);
  12.    swap2 = eval("dCard" add i);
  13.    set("dCard" add i,swap1);
  14.    set("dCard" add a,swap2);
  15.    i += "1";
  16. }
  17.